Neben dieser Möglichkeit in PAKMA 2002 die Bedienung einer Simulation bzw. eines reproduzierten Realexperiments angenehmer zu gestalten, können auch Animationselemente über das Kernprogramm gesteuert werden. Wir haben bereits am Beispiel für den Schieber gesehen wie Elemente sichtbar bzw. unsichtbar geschalten werden.
So können beispielsweise Schieber, aber auch alle Animationselemente (wie z.B. Vektoren, Linien, usw.) vollständig ausgeblendet werden, um die volle Aufmerksamkeit auf den Simulationsablauf zu lenken.

Es können mehrere Animationselemente auf einmal gesteuert werden, indem deren Namen, getrennt durch ein Komma aufgelistet werden. Außerdem können anstelle der Werte 0 bzw. 1 auch eine Variable, der während des Projektablaufs die entsprechenden Werte zugewiesen wird, verwendet werden.

Farben ändern

Des weiteren kann die Aufmerksamkeit auf besonders relevante Teilaspekte eines Projektes mit Hilfe der Veränderung der Linien- und Füllfarbe von Animationselementen durch das Kernprogramm gesteuert werden. Zur Farbsteuerung über das Kernprogramm benötigen Sie folgende zwei Befehle: element_linienfarbe('Name', Farbkonstante) und element_fuellfarbe('Name', Farbkonstante).

Abb 3.109 Rechteckelement als Rahmen um den Schieber setzen

Nur zu Demonstrationszwecken sei hier die Möglichkeit aufgezeigt, wie man die Aufmerksamkeit auf bestimmte Elemente lenkt, in dem man ihre Farbe ändert.
Dazu soll ein Rahmen um den Schieber jeweils rot erscheinen, wenn an ihm noch keine Einstellung vorgenommen worden ist. Sobald sein Wert verändert wurde, soll er wieder schwarz dargestellt werden. Fügen Sie dazu ein neues Rechteck als Rahmen um den Schieber ein (siehe Abb.3.106). Wir verwenden diesmal die Kernprogramm Erweiterung, um nicht jedes mal das ganze Kernprogramm auflisten zu müssen.

Im Initialisierungsteil der Kernprogrammerweiterung wird eine Hilfsvariable D_alt definiert. Ihr wird als Anfangswert der Wert des Schiebers übergeben.

D_alt:=Schieber(D);

Fügen Sie in den Ausgabeteil der Kernprogrammerweiterung den folgenden Quelltext ein :

if ablauf_an=1 then 
begin 
  D_alt:=D;
  Element_LinienFarbe ('Rechteck 2',FWeiss);
end;

if ablauf_an=0 then
begin 
  if D_alt=D then 
  Element_LinienFarbe ('Rechteck 2',FRot);
  else Element_LinienFarbe ('Rechteck 2',FSchwarz);
end;

feder_D_Rahmen.prj

Zum Schluss soll noch sich noch die Farbe der Feder und der Massekugel in Abhängigkeit von der Lage ändern.
Liegt Sie oberhalb der Ruhelage soll sie Rot, ansonsten blau erscheinen.
Die zugehörige Kernprogrammerweiterung ist selbst erklärend. Ergänzen Sie die folgenden Programmzeilen im Ausgabe-Teil :

if ablauf_an=1 then 
begin 
  if x>0 then 
  begin
    Element_LinienFarbe ('Kreis 1', FBlau); 
    Element_FuellFarbe ('Kreis 1', FBlau);
  end 
  else 
  begin
    Element_LinienFarbe ('Kreis 1', FRot);
    Element_FuellFarbe ('Kreis 1', FRot);
  end;
end;
if ablauf_an=0 then
begin 
    Element_LinienFarbe ('Kreis 1', FSchwarz); 
    Element_FuellFarbe ('Kreis 1', FSchwarz);
end;

feder_kreisfarbe.prj

All diese Punkte zeigen, das Ergänzungen in einem Kernprogramm die Attraktivität, aber auch den Lernerfolg steigern können. Zu beachten gilt es aber stets, dass der Schwerpunkt der PAKMA-Projekte immer auf den zu lernenden Inhalten liegt. Dennoch können ausgestaltete Projekte, wie sie Sie beispielsweise auf der Schulbuch CD zu Dorn+Bader – Physik vorfinden, leicht nach individuellen Vorstellungen abgeändert und so mit relativ geringem Aufwand übernommen werden.